home *** CD-ROM | disk | FTP | other *** search
/ Windows 6-Pak - Disc 5 / Windows 6-Pak (InfoMagic) (Disc 5) (1999).ISO / Access-Control / HD95PROT.ZIP / HD95ADM.EXE / 0 / RCDATA / TFORM1 / TFORM1.txt
Text File  |  1998-02-13  |  3KB  |  155 lines
  1. object Form1: TForm1
  2.   Left = 1
  3.   Top = 1
  4.   Width = 603
  5.   Height = 473
  6.   ActiveControl = DIRLIST
  7.   Caption = 'HD95Admin'
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   KeyPreview = True
  13.   Position = poScreenCenter
  14.   Scaled = False
  15.   Visible = True
  16.   OnCloseQuery = FormCloseQuery
  17.   OnCreate = FormCreate
  18.   OnKeyDown = FormKeyDown
  19.   PixelsPerInch = 96
  20.   TextHeight = 13
  21.   object DriveTabSet: TTabControl
  22.     Left = 8
  23.     Top = 8
  24.     Width = 577
  25.     Height = 185
  26.     TabOrder = 0
  27.     OnChange = DriveTabSetChange
  28.     OnChanging = DriveTabSetChanging
  29.     object FILES: TFileListBox
  30.       Left = 329
  31.       Top = 6
  32.       Width = 244
  33.       Height = 173
  34.       Align = alClient
  35.       IntegralHeight = True
  36.       ItemHeight = 13
  37.       TabOrder = 1
  38.       OnChange = FILESChange
  39.       OnEnter = FILESEnter
  40.       OnKeyUp = FILESKeyUp
  41.       OnMouseDown = FILESMouseDown
  42.       OnMouseMove = FILESMouseMove
  43.     end
  44.     object DIRLIST: TDirectoryListBox
  45.       Left = 4
  46.       Top = 6
  47.       Width = 325
  48.       Height = 164
  49.       Align = alLeft
  50.       FileList = FILES
  51.       IntegralHeight = True
  52.       ItemHeight = 16
  53.       TabOrder = 0
  54.       OnChange = DIRLISTChange
  55.       OnDblClick = DIRLISTDblClick
  56.       OnEnter = DIRLISTEnter
  57.       OnKeyUp = DIRLISTKeyUp
  58.       OnMouseDown = DIRLISTMouseDown
  59.       OnMouseMove = DIRLISTMouseMove
  60.     end
  61.   end
  62.   object TRUSTEE_BOX: TGroupBox
  63.     Left = 8
  64.     Top = 232
  65.     Width = 481
  66.     Height = 153
  67.     Caption = '&Rights'
  68.     Color = clBtnFace
  69.     Ctl3D = True
  70.     ParentColor = False
  71.     ParentCtl3D = False
  72.     TabOrder = 1
  73.     object TrusteeBox: TListBox
  74.       Left = 2
  75.       Top = 15
  76.       Width = 477
  77.       Height = 138
  78.       Align = alTop
  79.       ExtendedSelect = False
  80.       ItemHeight = 13
  81.       Style = lbOwnerDrawFixed
  82.       TabOrder = 0
  83.       OnDragDrop = TrusteeBoxDragDrop
  84.       OnDragOver = TrusteeBoxDragOver
  85.       OnDrawItem = TrusteeBoxDrawItem
  86.       OnEnter = TrusteeBoxEnter
  87.       OnKeyDown = TrusteeBoxKeyDown
  88.       OnKeyPress = TrusteeBoxKeyPress
  89.       OnKeyUp = TrusteeBoxKeyUp
  90.       OnMouseDown = TrusteeBoxMouseDown
  91.       OnMouseMove = TrusteeBoxMouseMove
  92.     end
  93.   end
  94.   object BUTTONS: TGroupBox
  95.     Left = 496
  96.     Top = 232
  97.     Width = 89
  98.     Height = 153
  99.     TabOrder = 2
  100.     object EXIT_BUTTON: TButton
  101.       Left = 8
  102.       Top = 120
  103.       Width = 75
  104.       Height = 25
  105.       Caption = 'E&xit'
  106.       TabOrder = 1
  107.       OnClick = EXIT_BUTTONClick
  108.     end
  109.     object SAVE_BUTTON: TButton
  110.       Left = 8
  111.       Top = 88
  112.       Width = 75
  113.       Height = 25
  114.       Caption = '&Save'
  115.       TabOrder = 0
  116.       OnClick = SAVE_BUTTONClick
  117.     end
  118.     object HELP_BUTTON: TButton
  119.       Left = 8
  120.       Top = 16
  121.       Width = 75
  122.       Height = 25
  123.       Caption = '&Hilfe an'
  124.       TabOrder = 2
  125.       OnClick = HELP_BUTTONClick
  126.     end
  127.   end
  128.   object PATH_LABEL: TMemo
  129.     Left = 8
  130.     Top = 200
  131.     Width = 577
  132.     Height = 33
  133.     TabStop = False
  134.     Color = clInfoBk
  135.     Lines.Strings = (
  136.       'HINT_LABEL')
  137.     ReadOnly = True
  138.     TabOrder = 3
  139.   end
  140.   object HELP_MEMO: TMemo
  141.     Left = 8
  142.     Top = 392
  143.     Width = 577
  144.     Height = 49
  145.     TabStop = False
  146.     Color = clInfoBk
  147.     Lines.Strings = (
  148.       'HELP_MEMO')
  149.     ReadOnly = True
  150.     ScrollBars = ssVertical
  151.     TabOrder = 4
  152.     WantReturns = False
  153.   end
  154. end
  155.